inherited frmRel_MargemLucro: TfrmRel_MargemLucro
  Left = 242
  Top = 268
  Caption = 'Margem de Contribui'#231#227'o por Pedido/Produto'
  ClientHeight = 391
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Height = 218
    object Label1: TLabel
      Left = 21
      Top = 100
      Width = 46
      Height = 14
      Caption = 'Situa'#231#227'o'
    end
    object Label2: TLabel
      Left = 10
      Top = 127
      Width = 57
      Height = 14
      Caption = 'Data Inicial'
    end
    object Label3: TLabel
      Left = 16
      Top = 155
      Width = 51
      Height = 14
      Caption = 'Data Final'
    end
    object Ed_marcarTodos: TCheckBox
      Left = 9
      Top = 1
      Width = 274
      Height = 17
      Caption = 'Marcar / desmarcar todos os tipos de pedidos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = Ed_marcarTodosClick
    end
    object Lista_TPedidos: TCheckListBox
      Left = 8
      Top = 18
      Width = 517
      Height = 72
      BevelKind = bkFlat
      BorderStyle = bsNone
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      IntegralHeight = True
      ItemHeight = 12
      Items.Strings = (
        'Pedido'
        'BASE'
        'FADAFAS'
        'FAS'
        'FAS')
      ParentFont = False
      TabOrder = 1
    end
    object EdtSituacao: TComboBox
      Left = 71
      Top = 98
      Width = 121
      Height = 22
      BevelKind = bkFlat
      Style = csDropDownList
      ItemHeight = 14
      TabOrder = 2
      OnChange = EdtSituacaoChange
      Items.Strings = (
        'Pendente(s)'
        'Fat. Parcialmente'
        'Faturado Total'
        'Cancelado(s)')
    end
    object Edt_dataIni: TDateEdit
      Left = 71
      Top = 125
      Width = 121
      Height = 21
      Ctl3D = False
      NumGlyphs = 2
      ParentCtl3D = False
      TabOrder = 3
    end
    object Edt_dataFinal: TDateEdit
      Left = 71
      Top = 153
      Width = 121
      Height = 21
      Ctl3D = False
      NumGlyphs = 2
      ParentCtl3D = False
      TabOrder = 4
    end
    object ckAgrupar: TCheckBox
      Left = 204
      Top = 100
      Width = 145
      Height = 17
      Caption = 'Agrupar Produtos'
      TabOrder = 5
      OnClick = ckAgruparClick
    end
    object pnlPed: TPanel
      Left = 192
      Top = 120
      Width = 169
      Height = 57
      BevelOuter = bvNone
      Color = 14936298
      TabOrder = 6
      object ckPendente: TCheckBox
        Left = 12
        Top = 12
        Width = 161
        Height = 17
        Caption = 'Mostrar Saldo Pendente'
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 0
        Visible = False
      end
      object ckDetProd: TCheckBox
        Left = 12
        Top = 32
        Width = 161
        Height = 17
        Caption = 'Detalhar Produtos'
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 1
      end
    end
    object pnlPerc: TPanel
      Left = 4
      Top = 179
      Width = 521
      Height = 34
      BevelOuter = bvNone
      Color = 14936298
      TabOrder = 7
      Visible = False
      object Label5: TLabel
        Left = 15
        Top = -2
        Width = 64
        Height = 14
        Caption = '% Cobran'#231'a'
      end
      object Label6: TLabel
        Left = 197
        Top = -2
        Width = 82
        Height = 14
        Caption = '% Ass. T'#233'cnica'
      end
      object Label7: TLabel
        Left = 379
        Top = -2
        Width = 60
        Height = 14
        Caption = '% Provis'#227'o'
      end
      object edAd1: TCurrencyEdit
        Left = 15
        Top = 13
        Width = 121
        Height = 21
        AutoSize = False
        Ctl3D = False
        DisplayFormat = '0.00'
        ParentCtl3D = False
        TabOrder = 0
      end
      object edAd2: TCurrencyEdit
        Left = 197
        Top = 13
        Width = 121
        Height = 21
        AutoSize = False
        Ctl3D = False
        DisplayFormat = '0.00'
        ParentCtl3D = False
        TabOrder = 1
      end
      object edAd3: TCurrencyEdit
        Left = 379
        Top = 13
        Width = 121
        Height = 21
        AutoSize = False
        Ctl3D = False
        DisplayFormat = '0.00'
        ParentCtl3D = False
        TabOrder = 2
      end
    end
  end
  inherited Panel2: TPanel
    Top = 324
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      OnClick = btncancelarClick
    end
  end
  inherited sb: TStatusBar
    Top = 372
  end
  object pb: TProgressBar [4]
    Left = 124
    Top = 390
    Width = 166
    Height = 17
    TabOrder = 4
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 448
    Top = 126
    object CDSPro_Codigo: TStringField
      FieldName = 'Pro_Codigo'
    end
    object CDSQuantidade: TFloatField
      FieldName = 'Quantidade'
    end
    object CDSValorCusto: TFloatField
      FieldName = 'ValorCusto'
    end
    object CDSFrete: TFloatField
      FieldName = 'Frete'
    end
    object CDSComissao: TFloatField
      FieldName = 'Comissao'
    end
    object CDSImposto: TFloatField
      FieldName = 'Imposto'
    end
    object CDSAdCobr: TFloatField
      FieldName = 'AdCobr'
    end
    object CDSAdAss: TFloatField
      FieldName = 'AdAss'
    end
    object CDSAdProv: TFloatField
      FieldName = 'AdProv'
    end
    object CDSTotVenda: TFloatField
      FieldName = 'TotVenda'
    end
    object CDSTotCusto: TFloatField
      FieldName = 'TotCusto'
    end
    object CDSLucro: TFloatField
      FieldName = 'Lucro'
    end
    object CDSContador: TIntegerField
      FieldName = 'Contador'
      Visible = False
    end
  end
  object DataSource1: TDataSource
    DataSet = CDS
    Left = 452
    Top = 166
  end
end
